home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d13 / pcrjan89.arc / GETDATE.SCR < prev    next >
Text File  |  1990-03-21  |  484b  |  13 lines
  1. N GETDATE.COM      ;Name program
  2. A 100              ;Start assembly
  3. MOV     AH,2A      ;DOS function: get date
  4. INT     21         ;Call DOS (returns day of month in DL)
  5. MOV     AL,DL      ;Move date in DL to AL register
  6. MOV     AH,4C      ;DOS function: terminate with return code
  7. INT     21         ;Call DOS (with return code in AL)
  8.  
  9. RCX                ;Set CX to write 10 bytes (0A hexadecimal)
  10. 0A
  11. W                  ;Write file to disk
  12. Q                  ;Quit DEBUG
  13.